home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d12
/
v9n03.arc
/
ERRVAR2.BAT
< prev
next >
Wrap
DOS Batch File
|
1990-01-12
|
519b
|
25 lines
ERRVAR2.BAT
ECHO OFF
SET E=
FOR %%q IN (0 1 2) DO IF ErrorLevel %%q00 SET E=%%q
IF "%E%"=="2" GOTO over200
FOR %%q IN (0 1 2 3 4 5 6 7 8 9) DO IF ErrorLevel %E%%%q0 SET E=%E%%%q
GOTO digit2
:over200
FOR %%q IN (0 1 2 3 4 5) DO IF ErrorLevel %E%%%q0 SET E=%E%%%q
:digit2
IF "%E%"=="25" GOTO over250
GOTO digit3
:over250
FOR %%q IN (0 1 2 3 4 5) DO IF Errorlevel %E%%%q SET E=%E%%%q
GOTO done
:digit3
FOR %%q IN (0 1 2 3 4 5 6 7 8 9) DO IF ErrorLevel %E%%%q SET E=%E%%%q
:done